/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / Frontier 4.2.3 / Desktop Scripts / Folder Structure / Folder Structure.rsrc / scpt_129

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 01 04 fe 00 02 00 00 | 00 b4 00 00 03 04 00 00 |........|........|
|00000010| 02 00 00 0f 06 47 65 6e | 65 76 61 00 00 00 00 00 |.....Gen|eva.....|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 09 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 06 45 00 00 a5 73 | b7 12 a8 fd 2c 3b 00 00 |...E...s|....,;..|
|00000050| 00 12 00 00 00 2a 00 7c | 01 8e 01 dc 4c 41 4e 44 |.....*.||....LAND|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 6f 6e 20 66 |........|....on f|
|00000080| 6f 6c 64 65 72 53 74 72 | 75 63 74 75 72 65 20 28 |olderStr|ucture (|
|00000090| 70 61 74 68 29 0d 09 6c | 6f 63 61 6c 20 28 66 69 |path)..l|ocal (fi|
|000000a0| 6c 65 63 6f 75 6e 74 20 | 3d 20 30 29 0d 09 6c 6f |lecount |= 0)..lo|
|000000b0| 63 61 6c 20 28 6c 69 73 | 74 20 3d 20 40 70 65 6f |cal (lis|t = @peo|
|000000c0| 70 6c 65 2e 5b 75 73 65 | 72 2e 69 6e 69 74 69 61 |ple.[use|r.initia|
|000000d0| 6c 73 5d 2e 66 69 6c 65 | 6c 69 73 74 29 0d 09 69 |ls].file|list)..i|
|000000e0| 66 20 6e 6f 74 20 64 65 | 66 69 6e 65 64 20 28 6c |f not de|fined (l|
|000000f0| 69 73 74 5e 29 0d 09 09 | 6e 65 77 20 28 6f 75 74 |ist^)...|new (out|
|00000100| 6c 69 6e 65 54 79 70 65 | 2c 20 6c 69 73 74 29 0d |lineType|, list).|
|00000110| 09 65 64 69 74 20 28 6c | 69 73 74 29 0d 09 6f 70 |.edit (l|ist)..op|
|00000120| 2e 77 69 70 65 20 28 29 | 0d 09 66 6f 6c 64 65 72 |.wipe ()|..folder|
|00000130| 20 3d 20 66 69 6c 65 2e | 66 6f 6c 64 65 72 46 72 | = file.|folderFr|
|00000140| 6f 6d 50 61 74 68 20 28 | 70 61 74 68 29 0d 09 6f |omPath (|path)..o|
|00000150| 70 2e 73 65 74 4c 69 6e | 65 54 65 78 74 20 28 66 |p.setLin|eText (f|
|00000160| 6f 6c 64 65 72 29 0d 09 | 6c 6f 63 61 6c 20 28 64 |older)..|local (d|
|00000170| 69 72 20 3d 20 72 69 67 | 68 74 29 20 c7 66 69 72 |ir = rig|ht) .fir|
|00000180| 73 74 20 68 65 61 64 6c | 69 6e 65 20 69 6e 73 65 |st headl|ine inse|
|00000190| 72 74 65 64 20 74 6f 20 | 74 68 65 20 72 69 67 68 |rted to |the righ|
|000001a0| 74 20 6f 66 20 73 75 6d | 6d 69 74 0d 09 0d 09 6f |t of sum|mit....o|
|000001b0| 6e 20 74 72 61 76 65 72 | 73 65 20 28 70 61 74 68 |n traver|se (path|
|000001c0| 29 0d 09 09 6c 6f 63 61 | 6c 20 28 66 29 0d 09 09 |)...loca|l (f)...|
|000001d0| 66 69 6c 65 6c 6f 6f 70 | 20 28 66 20 69 6e 20 70 |fileloop| (f in p|
|000001e0| 61 74 68 29 0d 09 09 09 | 6f 70 2e 69 6e 73 65 72 |ath)....|op.inser|
|000001f0| 74 20 28 66 69 6c 65 2e | 66 69 6c 65 46 72 6f 6d |t (file.|fileFrom|
|00000200| 50 61 74 68 20 28 66 29 | 2c 20 64 69 72 29 0d 09 |Path (f)|, dir)..|
|00000210| 09 09 64 69 72 20 3d 20 | 64 6f 77 6e 0d 09 09 09 |..dir = |down....|
|00000220| 69 66 20 66 69 6c 65 2e | 69 73 46 6f 6c 64 65 72 |if file.|isFolder|
|00000230| 20 28 66 29 20 c7 64 69 | 76 65 20 69 6e 74 6f 20 | (f) .di|ve into |
|00000240| 74 68 65 20 66 6f 6c 64 | 65 72 0d 09 09 09 09 64 |the fold|er.....d|
|00000250| 69 72 20 3d 20 72 69 67 | 68 74 0d 09 09 09 09 74 |ir = rig|ht.....t|
|00000260| 72 61 76 65 72 73 65 20 | 28 66 29 20 c7 72 65 63 |raverse |(f) .rec|
|00000270| 75 72 73 65 0d 09 09 09 | 09 69 66 20 64 69 72 20 |urse....|.if dir |
|00000280| 21 3d 20 72 69 67 68 74 | 20 c7 61 74 20 6c 65 61 |!= right| .at lea|
|00000290| 73 74 20 6f 6e 65 20 69 | 74 65 6d 20 61 64 64 65 |st one i|tem adde|
|000002a0| 64 20 66 72 6f 6d 20 74 | 68 65 20 66 6f 6c 64 65 |d from t|he folde|
|000002b0| 72 0d 09 09 09 09 09 6f | 70 2e 67 6f 20 28 6c 65 |r......o|p.go (le|
|000002c0| 66 74 2c 20 31 29 0d 09 | 09 09 09 64 69 72 20 3d |ft, 1)..|...dir =|
|000002d0| 20 64 6f 77 6e 0d 09 09 | 09 65 6c 73 65 0d 09 09 | down...|.else...|
|000002e0| 09 09 77 69 6e 64 6f 77 | 2e 6d 73 67 20 28 66 69 |..window|.msg (fi|
|000002f0| 6c 65 63 6f 75 6e 74 2b | 2b 20 2b 20 22 20 66 69 |lecount+|+ + " fi|
|00000300| 6c 65 73 2e 22 29 0d 09 | 09 09 72 6f 6c 6c 42 65 |les.")..|..rollBe|
|00000310| 61 63 68 42 61 6c 6c 20 | 28 29 0d 09 74 72 61 76 |achBall |()..trav|
|00000320| 65 72 73 65 20 28 66 6f | 6c 64 65 72 29 0d 09 6f |erse (fo|lder)..o|
|00000330| 70 2e 66 69 72 73 74 53 | 75 6d 6d 69 74 20 28 29 |p.firstS|ummit ()|
|00000340| 0d 09 6f 70 2e 63 6f 6c | 6c 61 70 73 65 20 28 29 |..op.col|lapse ()|
|00000350| 0d 09 6f 70 2e 65 78 70 | 61 6e 64 20 28 31 29 0d |..op.exp|and (1).|
|00000360| 09 46 72 6f 6e 74 69 65 | 72 2e 66 69 6e 64 65 72 |.Frontie|r.finder|
|00000370| 74 6f 66 72 6f 6e 74 20 | 3d 20 66 61 6c 73 65 0d |tofront |= false.|
|00000380| 80 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000390| 00 00 80 00 00 00 00 00 | 00 00 00 00 00 00 80 00 |........|........|
|000003a0| 00 00 00 00 80 00 00 00 | 00 00 80 00 00 00 00 00 |........|........|
|000003b0| 80 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|000003c0| 00 00 80 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 00 00 00 80 00 | 00 00 00 00 80 00 00 00 |........|........|
|00000420| 00 00 80 00 00 00 00 00 | 80 00 00 00 00 00 80 00 |........|........|
|00000430| 00 00 00 00             |                         |....    |        |
+--------+-------------------------+-------------------------+--------+--------+